home *** CD-ROM | disk | FTP | other *** search
/ 1000 Apple LAN Literacy / 1000 Apple LAN Literacy.iso / Apple LAN Literacy / Literacy Segments Part 1 / Literacy Segments Part 1 / background_65651.txt < prev    next >
Text File  |  1989-08-22  |  9KB  |  426 lines
  1. -- background: 65651 from stack: in
  2. -- bmap block id: 65889
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: 1.1.3 Practice3
  6. ----- HyperTalk script -----
  7. on openCard
  8.   global answerTracker
  9.   beenHereFlag 2,3
  10.   -- first param is item #, second is line # (of global)
  11.   send mouseUp to bg btn "done"
  12.   repeat with i = 1 to 2
  13.     get line (line 2 of fld "key") of answerTracker
  14.     if it = "y" and i = line 1 of fld "key"
  15.     then set the hilite of bg btn (6 + i) to true  -- True is btn 7
  16.   else set the hilite of bg btn (6 + i) to false -- False is btn 8
  17. end repeat
  18. pass openCard
  19. end openCard
  20.  
  21. on hideFeedback
  22.   lock screen
  23.   hide fld "Feedback1"
  24.   hide fld "Feedback2"
  25.   hide fld "CorrectAnswer"
  26.   hide fld "MasterFeedback"
  27.   hide bg btn "Done"
  28.   unlock screen
  29. end hideFeedback
  30.  
  31. on showFeedback
  32.   lock screen
  33.   show fld "Feedback1"
  34.   show fld "Feedback2"
  35.   show fld "CorrectAnswer"
  36.   show fld "MasterFeedback"
  37.   show bg btn "Done"
  38.   unlock screen
  39. end showFeedback
  40.  
  41. on feedback
  42.   global answerTracker
  43.   lock screen
  44.  
  45.   get (number of the target - 6)   -- True is btn 7, False is btn 8
  46.   if line (line 2 of fld "key") of answerTracker ‚↠"y" then
  47.     -- don't overwrite if Q has been answered
  48.     if it = line 1 of fld "key" then
  49.       -- this is the correct answer
  50.       put "y" into line (line 2 of fld "key") of answerTracker
  51.     else put "n" into line (line 2 of fld "key") of answerTracker
  52.   end if
  53.  
  54.   put fld ("feedback" & it) into fld "masterFeedback"
  55.   show fld "masterFeedback"
  56.   show bg btn "Done"
  57.  
  58.   unlock screen
  59. end feedback
  60.  
  61.  
  62. -- part 3 (field)
  63. -- low flags: 01
  64. -- high flags: 0000
  65. -- rect: left=18 top=1 right=38 bottom=442
  66. -- title width / last selected line: 0
  67. -- icon id / first selected line: 0 / 0
  68. -- text alignment: 0
  69. -- font id: 156
  70. -- text size: 24
  71. -- style flags: 10240
  72. -- line height: 32
  73. -- part name: Title
  74.  
  75.  
  76. -- part 14 (button)
  77. -- low flags: 00
  78. -- high flags: 0000
  79. -- rect: left=443 top=5 right=72 bottom=512
  80. -- title width / last selected line: 0
  81. -- icon id / first selected line: 0 / 0
  82. -- text alignment: 1
  83. -- font id: 0
  84. -- text size: 12
  85. -- style flags: 0
  86. -- line height: 16
  87. -- part name: Instant Reference
  88. ----- HyperTalk script -----
  89. on mouseUp
  90.   instantReference "1.1.3"
  91. end mouseUp
  92.  
  93.  
  94. -- part 15 (button)
  95. -- low flags: 00
  96. -- high flags: 2000
  97. -- rect: left=480 top=143 right=172 bottom=511
  98. -- title width / last selected line: 0
  99. -- icon id / first selected line: 1310 / 1310
  100. -- text alignment: 1
  101. -- font id: 0
  102. -- text size: 12
  103. -- style flags: 0
  104. -- line height: 16
  105. -- part name: Student Services
  106. ----- HyperTalk script -----
  107. on mousedown
  108.   SSpopUp
  109. end mousedown
  110.  
  111. on mouseup
  112.   if the mouseloc is not within the rect of me then exit to hyperCard
  113.   doSS
  114. end mouseup
  115.  
  116.  
  117.  
  118. -- part 16 (button)
  119. -- low flags: 00
  120. -- high flags: 2000
  121. -- rect: left=482 top=176 right=205 bottom=511
  122. -- title width / last selected line: 0
  123. -- icon id / first selected line: 162 / 162
  124. -- text alignment: 1
  125. -- font id: 0
  126. -- text size: 12
  127. -- style flags: 0
  128. -- line height: 16
  129. -- part name: Help
  130. ----- HyperTalk script -----
  131. on mouseUp
  132.   Help
  133. end mouseUp
  134.  
  135.  
  136.  
  137. -- part 17 (button)
  138. -- low flags: 00
  139. -- high flags: 2000
  140. -- rect: left=482 top=294 right=320 bottom=509
  141. -- title width / last selected line: 0
  142. -- icon id / first selected line: 1236 / 1236
  143. -- text alignment: 1
  144. -- font id: 0
  145. -- text size: 12
  146. -- style flags: 0
  147. -- line height: 16
  148. -- part name: Last Menu
  149. ----- HyperTalk script -----
  150. on mouseUp
  151.   go card "What is OSI Model? P/1"
  152. end mouseUp
  153.  
  154.  
  155.  
  156.  
  157. -- part 18 (button)
  158. -- low flags: 00
  159. -- high flags: 2000
  160. -- rect: left=478 top=319 right=341 bottom=498
  161. -- title width / last selected line: 0
  162. -- icon id / first selected line: 1238 / 1238
  163. -- text alignment: 1
  164. -- font id: 0
  165. -- text size: 12
  166. -- style flags: 0
  167. -- line height: 16
  168. -- part name: Prev
  169. ----- HyperTalk script -----
  170. on mouseUp
  171.   lock screen
  172.   go prev
  173.   unlock screen with scroll right
  174. end mouseUp
  175.  
  176.  
  177. -- part 19 (button)
  178. -- low flags: 00
  179. -- high flags: 2000
  180. -- rect: left=493 top=319 right=341 bottom=512
  181. -- title width / last selected line: 0
  182. -- icon id / first selected line: 1237 / 1237
  183. -- text alignment: 1
  184. -- font id: 0
  185. -- text size: 12
  186. -- style flags: 0
  187. -- line height: 16
  188. -- part name: Next
  189. ----- HyperTalk script -----
  190. on mouseUp
  191.   lock screen
  192.   go next
  193.   unlock screen with scroll left
  194. end mouseUp
  195.  
  196.  
  197. -- part 20 (field)
  198. -- low flags: 01
  199. -- high flags: 0000
  200. -- rect: left=16 top=38 right=67 bottom=438
  201. -- title width / last selected line: 0
  202. -- icon id / first selected line: 0 / 0
  203. -- text alignment: 0
  204. -- font id: 156
  205. -- text size: 20
  206. -- style flags: 0
  207. -- line height: 26
  208. -- part name: Subtitle
  209.  
  210.  
  211. -- part 21 (field)
  212. -- low flags: 01
  213. -- high flags: 0000
  214. -- rect: left=16 top=70 right=125 bottom=449
  215. -- title width / last selected line: 0
  216. -- icon id / first selected line: 0 / 0
  217. -- text alignment: 0
  218. -- font id: 156
  219. -- text size: 16
  220. -- style flags: 0
  221. -- line height: 17
  222. -- part name: Text
  223.  
  224.  
  225. -- part 22 (field)
  226. -- low flags: 01
  227. -- high flags: 0000
  228. -- rect: left=16 top=128 right=148 bottom=283
  229. -- title width / last selected line: 0
  230. -- icon id / first selected line: 0 / 0
  231. -- text alignment: 0
  232. -- font id: 3
  233. -- text size: 10
  234. -- style flags: 256
  235. -- line height: 15
  236. -- part name: Instruction
  237.  
  238.  
  239. -- part 23 (button)
  240. -- low flags: 00
  241. -- high flags: A004
  242. -- rect: left=301 top=137 right=154 bottom=370
  243. -- title width / last selected line: 0
  244. -- icon id / first selected line: 0 / 0
  245. -- text alignment: 1
  246. -- font id: 0
  247. -- text size: 12
  248. -- style flags: 0
  249. -- line height: 16
  250. -- part name: True
  251. ----- HyperTalk script -----
  252. on mouseUp
  253.   feedback
  254. end mouseUp
  255.  
  256.  
  257. -- part 25 (button)
  258. -- low flags: 00
  259. -- high flags: A004
  260. -- rect: left=377 top=137 right=154 bottom=446
  261. -- title width / last selected line: 0
  262. -- icon id / first selected line: 0 / 0
  263. -- text alignment: 1
  264. -- font id: 0
  265. -- text size: 12
  266. -- style flags: 0
  267. -- line height: 16
  268. -- part name: False
  269. ----- HyperTalk script -----
  270. on mouseUp
  271.   feedback
  272. end mouseUp
  273.  
  274.  
  275. -- part 26 (button)
  276. -- low flags: 00
  277. -- high flags: A004
  278. -- rect: left=179 top=321 right=340 bottom=324
  279. -- title width / last selected line: 0
  280. -- icon id / first selected line: 0 / 0
  281. -- text alignment: 1
  282. -- font id: 0
  283. -- text size: 12
  284. -- style flags: 0
  285. -- line height: 16
  286. -- part name: Answer
  287. ----- HyperTalk script -----
  288. on mouseUp
  289.   global answerTracker
  290.   lock screen
  291.   put "y" into line (line 2 of fld "key") of answerTracker
  292.   put fld "CorrectAnswer" into fld "MasterFeedback"
  293.   show fld "MasterFeedback"
  294.   show bg btn "Done"
  295.   unlock screen
  296. end mouseUp
  297.  
  298.  
  299. -- part 28 (field)
  300. -- low flags: 81
  301. -- high flags: 2007
  302. -- rect: left=8 top=36 right=94 bottom=231
  303. -- title width / last selected line: 0
  304. -- icon id / first selected line: 0 / 0
  305. -- text alignment: 0
  306. -- font id: 156
  307. -- text size: 16
  308. -- style flags: 0
  309. -- line height: 17
  310. -- part name: Feedback1
  311.  
  312.  
  313. -- part 29 (field)
  314. -- low flags: 81
  315. -- high flags: 2007
  316. -- rect: left=8 top=97 right=155 bottom=231
  317. -- title width / last selected line: 0
  318. -- icon id / first selected line: 0 / 0
  319. -- text alignment: 0
  320. -- font id: 156
  321. -- text size: 16
  322. -- style flags: 0
  323. -- line height: 17
  324. -- part name: Feedback2
  325.  
  326.  
  327. -- part 30 (field)
  328. -- low flags: 81
  329. -- high flags: 2007
  330. -- rect: left=239 top=36 right=154 bottom=462
  331. -- title width / last selected line: 0
  332. -- icon id / first selected line: 0 / 0
  333. -- text alignment: 0
  334. -- font id: 156
  335. -- text size: 16
  336. -- style flags: 0
  337. -- line height: 17
  338. -- part name: CorrectAnswer
  339.  
  340.  
  341. -- part 31 (field)
  342. -- low flags: 81
  343. -- high flags: 2004
  344. -- rect: left=147 top=132 right=304 bottom=356
  345. -- title width / last selected line: 0
  346. -- icon id / first selected line: 0 / 0
  347. -- text alignment: 0
  348. -- font id: 156
  349. -- text size: 16
  350. -- style flags: 0
  351. -- line height: 17
  352. -- part name: MasterFeedback
  353.  
  354.  
  355. -- part 32 (button)
  356. -- low flags: 80
  357. -- high flags: A002
  358. -- rect: left=215 top=279 right=296 bottom=284
  359. -- title width / last selected line: 0
  360. -- icon id / first selected line: 0 / 0
  361. -- text alignment: 1
  362. -- font id: 0
  363. -- text size: 12
  364. -- style flags: 0
  365. -- line height: 16
  366. -- part name: Done
  367. ----- HyperTalk script -----
  368. on mouseUp
  369.   global answerTracker
  370.   lock screen
  371.   if line (line 2 of fld "key") of answerTracker = "y" then
  372.     -- question correctly answered
  373.     set the hilite of bg btn (6 + line 1 of fld "key") to true
  374.     -- True btn is number 8, False is number 9
  375.   end if
  376.   hide fld "MasterFeedback"
  377.   hide bg btn "Done"
  378.   unlock screen
  379. end mouseUp
  380.  
  381.  
  382. -- part 43 (field)
  383. -- low flags: 81
  384. -- high flags: 0001
  385. -- rect: left=423 top=0 right=13 bottom=466
  386. -- title width / last selected line: 0
  387. -- icon id / first selected line: 0 / 0
  388. -- text alignment: 65535
  389. -- font id: 4
  390. -- text size: 9
  391. -- style flags: 0
  392. -- line height: 12
  393. -- part name: CardTitle
  394.  
  395.  
  396. -- part 44 (button)
  397. -- low flags: 00
  398. -- high flags: 2000
  399. -- rect: left=482 top=208 right=234 bottom=509
  400. -- title width / last selected line: 0
  401. -- icon id / first selected line: 1234 / 1234
  402. -- text alignment: 1
  403. -- font id: 0
  404. -- text size: 12
  405. -- style flags: 0
  406. -- line height: 16
  407. -- part name: Lesson
  408. ----- HyperTalk script -----
  409. on mouseUp
  410.   lesson "1.1.3"
  411. end mouseUp
  412.  
  413.  
  414. -- part 45 (field)
  415. -- low flags: 81
  416. -- high flags: 0002
  417. -- rect: left=1 top=308 right=341 bottom=71
  418. -- title width / last selected line: 0
  419. -- icon id / first selected line: 0 / 0
  420. -- text alignment: 0
  421. -- font id: 3
  422. -- text size: 12
  423. -- style flags: 0
  424. -- line height: 16
  425. -- part name: Key
  426.